function [RLS] = calc_RLS(Mach, Sweep)

Mach_RLS_tab = [0.0 0.25 0.6 0.8 0.9];
cos_RLS_tab  = [0.5 0.6  0.7 0.8 0.9 1];

% Mach =          0.0    0.25    0.60    0.80    0.90        cos
RLS_table =   [ 0.810	0.810	0.880	1.000	1.100;...    0.5
                0.890	0.890	0.960	1.070	1.165;...    0.6
                0.967	0.967	1.040	1.142	1.235;...    0.7
                1.030	1.030	1.113	1.210	1.300;...    0.8
                1.052	1.052	1.133	1.243	1.333;...    0.9
                1.070	1.070	1.150	1.270	1.360];    % 1.0
    
RLS = interp2(Mach_RLS_tab, cos_RLS_tab, RLS_table, Mach, cos(Sweep));



